This Notebook Server was launched just for you. It's a temporary way for you to try out a Perl 6 Jupyter notebook.
**WARNING**
Don't rely on this server for anything you want to last - your server will be *deleted after 10 minutes of inactivity*.
In [1]:
"hello, world"
Out[1]:
In [2]:
1..5 X~ 'a'..'b'
Out[2]:
In [3]:
(2..7) ⊂ (1..10)
Out[3]:
In [4]:
use SVG;
use SVG::Plot;
my $points = 50;
my @x = (0..$points).map: { sin(2 * π * $_ / $points) };
my @d1 = (0..$points).map: { 2 * cos(2 * π * $_ / $points) };
my @d2 = (0..$points).map: { cos(2 * π * $_ / $points) };
SVG.serialize: SVG::Plot.new(
width => 400,
height => 250,
:@x,
values => (@d1, @d2),
title => 'sin(x/10), cos(x/10)',
).plot(:xy-lines);
Out[4]:
For more examples, see https://github.com/bduggan/p6-jupyter-kernel/tree/master/eg